SIMULATE

//Pravac A
		GENERATE 15,7					//Stižu kola iz pravca A
		QUEUE REDA						//Red za pravac A
		GATE LS SEMAFOR					//Ako je zeleno za pravac A
		GATE SNF RASKRS					//i ako raskrsnica nije zauzeta
		DEPART REDA						//Izlazimo iz reda
		TABULATE AV						//Beležimo vreme čekanja
		TRANSFER PROLAZ

//Pravac B
		GENERATE 16,6					//Stiži kola iz pravca B
		QUEUE REDB						//Red za pravac B
		GATE LR SEMAFOR					//Ako je zeleno za pravac B
		GATE SNF RASKRS					//i ako raskrsnica nije zauzeta
		DEPART REPDB					//Izlazimo iz reda
		TABULATE BV						//Beležimo vreme čekanja

PROLAZ:	ENTER RASKRS					//Ulzimo u raskrsnicu
		ADVANCE 7						//Prolazak kroz nju 7 sec
		DEPART RASKRS					//Izlazak iz raskrsnice
		ADVANCE FN$VRC					//Trajanje puta do tačke C
		TABULATE EKV					//Beležimo ukpno vreme
		TERMINATE

//Semafor
		GENERATE 90						//Na svakih 90 sekundi
		LOGIC I SEMAFOR					//Obrće se logički prekidač semafora
		TERMINATE

GENERATE 3600							//Jednosatni dekrementor term. brojaca
TERMINATE 1

VRC FUNCTION RN1,D5						//funkcija za trajanje puta do C
.2,23/.4,25/.6,28/.8,31/1.0,36
RASKRS STORAGE 2						//u raskrsnici mogu da budu samo 2 auta istovremeno
AV TABLE M1,							//histogram za vreme čekanja za A
BV TABLE M1,							//histogram za vreme čekanja za B
UKV TABLE M1,60,60,6					//hostogram zaukupno vreme

START 1									//Startujemo u tranjau od 1 sat
END

Ne znam koje parametre za histograme vremena čekanja da stavim, probajte da izmislite sami.